-module(area_server0).
-export([loop/0]).

loop() ->
	receive
		{rectangle, W,H} ->
			io:format("Area of rectangle. ~p~n", [W * H]),
			loop();
		{circle, R} ->
			io:format("Area of circle. ~p~n", [R * R * 3.14]),
			loop();
		Other -> 
			io:format("Undefined. ~p~n", [Other]),
			loop()
	end.
			